home *** CD-ROM | disk | FTP | other *** search
/ PC World Interactive 7 / PC World Interactive 7.iso / online / motor.EXE / DOSYA.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1991-10-04  |  133 b   |  11 lines
  1. uses crt;
  2. var
  3. f1,f2   :text;
  4. s:string;
  5. begin
  6. readln(s);
  7. assign(f1,'dosya.dat');
  8. rewrite(f1);
  9. writeln(f1,s);
  10. close(f1);
  11. end.